f:= proc(y) 
 add:=proc( x , y ) return x+y end;
 return add( 3 , y ) 
end; 
r:=f(3);
rexpected := 6